home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Info-Mac 4
/
Info_Mac IV CD-ROM (Pacific HiTech Inc.)(August 1994).iso
/
Science
/
Asymptote Demo
/
Demo
< prev
next >
Wrap
Text File
|
1994-05-07
|
1KB
|
42 lines
% A demonstration script for Asymptote
% ••• To run the demo select:
% "Run Recorder"
% from the "Script" menu.
if undefined demoNumber then set demoNumber 1 $
else if demoNumber 13 = then set demoNumber 1 $
else set demoNumber demoNumber 1 +
% Ask which demo to run
set demoNumber ?Which demo (1 through 13) would you like to see?
if demoNumber 1 < demoNumber 13 > * then stop
% Run the demo script (\demoNumber inserts the number into the script name)
Demo\demoNumber
% Close that script now that we are done with it
close Demo\demoNumber
set response true
ask response OK Cancel ?• Click with the command key pressed to zoom in. $
• Click with command && option pressed to zoom out. $
• Click the mouse with no keys pressed when you are done examining the graph.
cursor
set PrintIt false % Make false the default choice
ask PrintIt Yes No Do you want to print the graph?
if PrintIt then print % Print the graph if PrintIt is true
fullscreen no
set response true
ask response OK Quit ?To try a different demo select Run Recorder from the Script menu.
if response false = then quit